vr2-2-07.wrl


[ VRML source code ]

#VRML V2.0 utf8
#vr2-2-07.wrl
Group {
  children [
    DEF TOUCH TouchSensor {}
    Shape {
      appearance Appearance {
        material Material {  
          diffuseColor 0 1 0  
      }
    }
    geometry Cone { }
  ]
}
DEF SWITCH PointLight {
  location 1 1 1
  on FALSE 
}
ROUTE TOUCH.isActive_changed TO SWITCH.set_on